Komputer for Alle 2001 #16/2001 CD 16 (Black).iso/06/CANDLESPUZZLE.EXE/0/RCDATA/TFORMMAIN/TFORMMAIN.txt

Text File | 2001-10-09 | 2.8 KB | 118 lines

object FormMain: TFormMain
  Left = 188
  Top = 107
  VertScrollBar.ButtonSize = 16
  BorderStyle = bsSingle
  Caption = 'B-Jigsaw Lite'
  ClientHeight = 446
  ClientWidth = 644
  Color = 8421440
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu
  OldCreateOrder = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnMouseUp = FormMouseUp
  OnPaint = FormPaint
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object MediaPlayer: TMediaPlayer
    Left = 208
    Top = 8
    Width = 253
    Height = 30
    EnabledButtons = []
    DeviceType = dtSequencer
    Visible = False
    TabOrder = 0
    OnNotify = MediaPlayerNotify
  end
  object MainMenu: TMainMenu
    Left = 56
    Top = 40
    object Game1: TMenuItem
      Caption = '&Game'
      object NewGameMenu: TMenuItem
        Caption = '&New game'
        ImageIndex = 0
        ShortCut = 113
        OnClick = NewGameMenuClick
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object ExitMenu: TMenuItem
        Caption = 'E&xit'
        OnClick = ExitMenuClick
      end
    end
    object Pieces1: TMenuItem
      Caption = '&Pieces'
      object RandomEdgeMenu: TMenuItem
        Caption = 'Random at &edge'
        OnClick = RandomEdgeMenuClick
      end
      object ArrangeGridMenu: TMenuItem
        Caption = 'Arrange in &grid'
        OnClick = ArrangeGridMenuClick
      end
      object RandomMenu: TMenuItem
        Caption = '&Random'
        OnClick = RandomMenuClick
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      object ShowThumbnailMenu: TMenuItem
        Caption = 'Show &thumbnail'
        ImageIndex = 7
        OnClick = ShowThumbnailMenuClick
      end
      object ShoworiginalMenu: TMenuItem
        Caption = 'Show &original image'
        OnClick = ShoworiginalMenuClick
      end
      object FullScreenMenu: TMenuItem
        Caption = '&Full screen'
        ShortCut = 123
        OnClick = FullScreenMenuClick
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object MusiconMenu: TMenuItem
        Caption = 'Music &on'
        OnClick = MusiconMenuClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object BJigsawHomePageMenu: TMenuItem
        Caption = '&B-Jigsaw home page'
        OnClick = BJigsawHomePageMenuClick
      end
      object N9: TMenuItem
        Caption = '-'
      end
      object AboutMenu: TMenuItem
        Caption = '&About'
        OnClick = AboutMenuClick
      end
    end
  end
  object Timer: TTimer
    Interval = 250
    Left = 88
    Top = 40
  end
end